Application.ModelessCmd("g20")
Application.ModelessCmd("gd20")
Application.StatusBarText = "Set Grids = 20"